home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Atari Mega Archive 1
/
Atari Mega Archive - Volume 1.iso
/
language
/
asxsrc.arc
/
ASDATA.C
< prev
next >
Wrap
C/C++ Source or Header
|
1991-06-10
|
3KB
|
110 lines
/* asdata.c */
/*
* (C) Copyright 1989
* All Rights Reserved
*
* Alan R. Baldwin
* 721 Berkeley St.
* Kent, Ohio 44240
*/
#include <stdio.h>
#include <setjmp.h>
#include "asm.h"
jmp_buf jump_env;
int inpfil;
int incfil;
int cfile;
int flevel;
int tlevel;
int ifcnd[MAXIF+1];
int iflvl[MAXIF+1];
int radix;
int line;
addr_t fuzz;
int page;
int lop;
int pass;
int lflag;
int oflag;
int aflag;
int gflag;
int sflag;
int xflag;
addr_t laddr;
int lmode;
char *ep;
char eb[NERR];
char *ip;
char ib[NINPUT];
char *cp;
char cb[NCODE];
char tb[NTITL];
char stb[NSBTL];
char symtbl[] = { "Symbol Table" };
char aretbl[] = { "Area Table" };
char module[NCPS];
struct mne *mnehash[NHASH];
struct sym sym[] = {
NULL, NULL, ".", S_USER, S_END, NULL, 0, 0
};
struct sym *symp;
struct sym *symhash[NHASH];
struct area area[] = {
NULL, "_CODE", 0, 0, 0, A_CON|A_REL
};
struct area *areap;
FILE *lfp;
FILE *ofp;
FILE *tfp;
FILE *sfp[MAXFIL];
FILE *ifp[MAXINC];
char ctype[128] = {
ILL, ILL, ILL, ILL, ILL, ILL, ILL, ILL,
ILL, SPACE, ILL, ILL, SPACE, ILL, ILL, ILL,
ILL, ILL, ILL, ILL, ILL, ILL, ILL, ILL,
ILL, ILL, ILL, ILL, ILL, ILL, ILL, ILL,
SPACE, ETC, ETC, ETC, LETTER, BINOP, BINOP, ETC,
ETC, ETC, BINOP, BINOP, ETC, BINOP, LETTER, BINOP,
DIGIT, DIGIT, DIGIT, DIGIT, DIGIT, DIGIT, DIGIT, DIGIT,
DIGIT, DIGIT, ETC, ETC, BINOP, ETC, BINOP, ETC,
ETC, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, ETC, ETC, ETC, BINOP, LETTER,
ETC, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, ETC, BINOP, ETC, ETC, ETC
};
#if CASE_SENSITIVE
#else
char ccase[128] = {
'\000', '\001', '\002', '\003', '\004', '\005', '\006', '\007',
'\010', '\011', '\012', '\013', '\014', '\015', '\016', '\017',
'\020', '\021', '\022', '\023', '\024', '\025', '\026', '\027',
'\030', '\031', '\032', '\033', '\034', '\035', '\036', '\037',
'\040', '\041', '\042', '\043', '\044', '\045', '\046', '\047',
'\050', '\051', '\052', '\053', '\054', '\055', '\056', '\057',
'\060', '\061', '\062', '\063', '\064', '\065', '\066', '\067',
'\070', '\071', '\072', '\073', '\074', '\075', '\076', '\077',
'\100', '\141', '\142', '\143', '\144', '\145', '\146', '\147',
'\150', '\151', '\152', '\153', '\154', '\155', '\156', '\157',
'\160', '\161', '\162', '\163', '\164', '\165', '\166', '\167',
'\170', '\171', '\172', '\133', '\134', '\135', '\136', '\137',
'\140', '\141', '\142', '\143', '\144', '\145', '\146', '\147',
'\150', '\151', '\152', '\153', '\154', '\155', '\156', '\157',
'\160', '\161', '\162', '\163', '\164', '\165', '\166', '\167',
'\170', '\171', '\172', '\173', '\174', '\175', '\176', '\177'
};
#endif